home *** CD-ROM | disk | FTP | other *** search
/ Hyper Erect Magazine / Hyper Erect Magazine - Disc 2.iso / pc / start.dxr / 00001.ls next >
Encoding:
Text File  |  1997-04-11  |  1.4 KB  |  39 lines
  1. on startMovie
  2.   global gmtype, gvol
  3.   if the machineType = 256 then
  4.     set gmtype to 1
  5.     if the quickTimePresent = 0 then
  6.       alert("QuickTime for Windows ﾃ‡邃｢ﾃ韻ﾃ嘉ｬﾃ厩ﾃ曳ﾃ…[ﾃ嘉｣" & RETURN & "ﾃ‡ﾅｽﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾃｾﾃ‡ﾃ津③")
  7.       quit()
  8.     end if
  9.     if the colorDepth < 16 then
  10.       alert("ﾃｪFﾃｪ[ﾃｬxﾃ‡ﾂ 32,000 ﾃｪFﾃ ﾂｻﾃｨ窶榲‡窶ｦﾃｪ窶ｺﾃｭﾃ凝‡ﾂ敕ｯﾅ禿ｧXﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡ﾃ" & RETURN & "ﾃｫNﾃｱﾃｦﾃ‡窶ｦﾃｯ¥ﾃｩﾂｶﾃ‡ﾅｽﾃ‡ﾃ催‡窶ｹﾃ‡ﾃｾﾃ‡ﾃ津③" & RETURN & "32,000 ﾃｪFﾃ ﾂｻﾃｨ窶榲‡窶ｦﾃｪ窶ｺﾃｭﾃ凝‡ﾃ敕‡ﾃ暗‡ﾃ敕‡ﾃ暗‡ﾂｱﾃ‡ﾃ静‡ﾂ敕‡ﾂｮﾃ､ﾂｩﾃ‡ﾂﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾃ敕③")
  11.     end if
  12.   else
  13.     set gmtype to 0
  14.     if the colorDepth <> 16 then
  15.       set the colorDepth to 16
  16.       if the colorDepth < 16 then
  17.         set the colorDepth to 32
  18.         if the colorDepth < 16 then
  19.           alert("ﾃ嘉‡ﾃ泳ﾃ運ﾃ‡ﾃεｯ¥ﾃｩﾂｶﾃｪFﾃｪﾃｮﾃ‡ﾃ陛②32,000 ﾃｪFﾃ ﾂｻﾃｨ窶榲ｯKﾃｳvﾃ‡ﾂｼﾃ‡ﾃ敕③")
  20.           quit()
  21.           exit
  22.         end if
  23.       end if
  24.     end if
  25.   end if
  26.   set the visible of sprite 1 to 1
  27.   set the cursor of sprite 1 to [member "YUBI", member "YUBIM"]
  28.   set the text of member "fDeleteMovie" to "START"
  29.   set the text of member "fPhotoFolder" to "1"
  30.   set the text of member "fPhotoCount" to "1"
  31.   set the text of member "fMovieNumber" to "1"
  32.   set the text of member "fQTVRSts" to "0"
  33.   set the text of member "fQTVRHotSpot" to "0"
  34.   set the text of member "fQTVRPanAngle" to "0"
  35.   set the text of member "fQTVRTiltAngle" to "0"
  36.   set gvol to 4
  37.   set the soundLevel to gvol
  38. end
  39.